Google
 
Trailing-Edge - PDP-10 Archives - 6.1_emacs_manuals_1er - emacs/sail.:ej
There are no other files named sail.:ej in the archive.
(W
[0+8+FQ(+4)[1
0FO10F"G+Q1
'W+FQ()+4U1
FQ1"L0'
,Q1:M(Q1+4(]1]0))
  )T[V`S]+mw-<%,	7	@
D
QFS
h
w

"

0		#		ior Locals)
1,q(1,q.m.Qw)m.Q.
1,(:I*COMMENT! )M.LComment Start
1,(:I*! )M.LComment Begin
1,(:I*;)M.LComment End
m.m^R Forward StatementM.Q...S
m.m^R Forward BlockM.Q...E
m.m^R Backward BlockM.Q...A
M.M^R Make BEGIN-ENDM.Q...U
M.M^R Make Labelled BEGIN-ENDM.Q...L
:I*                                                  A               A                            AA    A    A   AA    A    A    '    (    )    A    A         A   AA    /   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA    A    ;    A    A    A    A    A   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA    A    A    A    A    A    A   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA   AA    A    |    A    A        M.Q..D
Q.0,1M(M.M& Set Mode Line)SAIL^R Backward Block~0UD0U0.U1Z-."GC'
<-:SBEGINSTART!CODEEND"E
:i*No Block BackwardsFGQ1J'
C1A&137.-E"EQD-1UD'
"#QD+1UDQD;'>
0^R Forward StatementP(:I*;"COMMENT!ENDBEGINSTART!CODESTARTCODE)[S
FF"E0'"#-'[D
[E.[A
<:SS"EFGQAJ0'
.UEFKC
1A-;"E
QEJ
QD"E0'
!<!>'
1A-42."ECS"!'!!<!>'
:I*Unmatched QuoteFG0'
."G0A"CQEJR!<!>''
1A&137.-C"ES;!<!>'
1A-41."ES;!<!>'
1A&137.-E"E
QD"GFGQAJ0'
QD+1UD
QD"G0'
QEJR
!<!>'
QD-1UD
QEJR
QD"E0'
>^R Forward Block(:I*"COMMENT!ENDBEGINSTART!CODESTARTCODE)[S
FF[X
QX"E0'"#-'[D
[E.[A
<:SS"EFGQAJ0'
.UEFKC
1A-42."ECS"!'!!<!>'
."G0A"CQEJR!<!>''
1A&137.-C"ES;!<!>'
1A-41."ES;!<!>'
1A&137.-E"E
QD+1UD
QX*QD"GFGQAJ0'
QEJR
QD"L!<!>'
0'
QD-1UD
QEJR
QD"E0'
>^R Make BEGIN-ENDk.[A
FSHPOS
IBEGIN
QP/8,9IQP&7,32I
.[0
I
QP/8,9IQP&7,32I
IEND
FF"NI;'
.[Z
Q0J
QA,QZ^R Make Labelled BEGIN-END$.[A
1,M(M.M& Read Line)Block name: 
FSHPOS
IBEGIN "N"
!''!
QP/8,9IQP&7,32I
.[0
I
QP/8,9IQP&7,32I
IEND "N"!''!
FF"NI;'
.[Z
Q0J
QA,QZ~FILENAME~SAIL~DOC~ ~FILENAME~(Library for editing SAIL functions
~DOC~ SAIL ModeC Set things up for editing SAIL code.
Sets up:
	C-M-A,C-M-E		to be ^R Backward/Forward Block
	C-M-S			to be ^R Forward Statement
	C-M-U			to be ^R Make BEGIN-END
	C-M-L			to be ^R Make Labelled BEGIN-END
	<Rub>			to be ^R Backward Delete Hacking Tabs
~DOC~ ^R Backward Block.^R Move backward over one BEGIN/END pair
~DOC~ ^R Forward Statement^R Move forward over one SAIL statement.
With positive arg, go up one or more levels in BEGIN END nest.
With negative arg, go down one or more levels.
~DOC~ ^R Forward Block^R Move forward over one BEGIN END pair.
With positive arg, go up one or more levels in BEGIN END nest.
With negative arg, go down one or more levels.
~DOC~ ^R Make BEGIN-ENDR^R Create a BEGIN END pair.
Cursor position defines indentation level for this block.
Leave cursor ready to type first statement of the block.
With a numeric argument, places a semicolon after the END.
$~DOC~ ^R Make Labelled BEGIN-ENDt^R Create a BEGIN END pair.
Reads block name from echo area.
Cursor position defines indentation level for this block.
Leave cursor ready to type first statement of the block.
With a numeric argument, places a semicolon after the END.
~DIRECTORY~ySAIL Mode
^R Backward Block
^R Forward Statement
^R Forward Block
^R Make BEGIN-END
^R Make Labelled BEGIN-END


~INVERT~[1<Q1-1U1Q1FP;>Q1